> with(plots):

> A:=implicitplot3d(y^2 - (x^2+z)*(x+1), x = -2..2, y =-2..2, z = -4..2, axes=boxed, style = patchcontour, numpoints = 20000, lightmodel = light4):

> B3:=implicitplot3d(z=-2, x = -2..2, y =-2..2, z = -4..2, axes=boxed, style = patchnogrid, color = yellow):

> display(A);

> A:=implicitplot3d(y^2 - (x^2+z)*(x+1), x = -2..2, y =-2..2, z = -4..2, axes=boxed, style = patchnogrid, numpoints = 20000, orientation=[66,73], lightmodel=light4):

> display(A, B3);

>